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SECTION  1 . INTRODUCTION 


1.1  Purpose  of  the  Validation  Summary  Report 

The  purpose  of  the  Validation  Summary  Report  (VSR)  is  to  identify  individual 
FORTRAN  language  elements  whose  implementation  does  not  conform  to  the  language 
specifications  defined  in  American  Standard  FORTRAN,  X3. 9*1966. 

1.2  Preparation  of  the  VSR 

The  Validation  Summary  Report  is  prepared  by  analyzing  the  results  of  running 
the  FORTRAN  Compiler  Validation  System  (FCVS).  The  FORTRAN  Compiler  Validation 
System  consists  of  audit  routines  containing  features  of  American  Standard 
FORTRAN,  their  related  data,  and  an  Executive  Routine  which  prepares  the 
audit  routines  for  compilation.  Each  audit  routine  is  a FORTRAN  program  which 
includes  many  tests  and  supporting  procedures  indicating  the  result  of  the 
tests . 

The  testing  of  a compiler  in  a particular  hardware/operating  system  environment 
is  accomplished  by  compiling  and  executing  each  audit  routine.  The  report  pro- 
duced by  each  routine  tells  whether  the  compiler  passed  or  failed  the  tests  in 
the  routine.  If  the  compiler  rejects  some  language  elements  by  terminating 
compilation,  giving  fatal  diagnostic  messages,  or  terminating  execution  abnor- 
mally, then  the  test  containing  the  code  the  compiler  was  unable  to  process  is 
deleted.  The  audit  routine  is  compiled  again  and  execution  is  repeated. 

The  compilation  listings  and  the  output  reports  of  the  audit  routines  con- 
stitute the  raw  data  from  which  the  members  of  the  Federal  COBOL  Compiler 
Testing  Service  produce  a Validation  Summary  Report. 

1.3  Organization  of  the  VSR 

The  Validation  Summary  Report  is  made  up  of  several  sections  whose  contents 
are  described  below. 

a.  Section  2 summarizes  the  results  of  the  compilation  and  execution 

of  the  programs  comprising  the  FORTRAN  Compiler  Validation  System.  Section  2 
is  divided  into  a subsection  describing  the  syntax  errors  encountered  while 
compiling  the  FORTRAN  audit  routines,  and  a subsection  describing  the  semantic 
errors  which  occurred  during  execution  of  the  FORTRAN  audit  routines. 

b.  Section  3 contains  information  which  describes  the  software  environ- 
ment in  which  the  compiler  was  tested.  This  includes  the  name  and  version  of 
the  operating  system  and  the  logical  unit/physical  device  assignments  used  in 
the  programs  comprising  the  FCVS.  The  options  used  with  the  compiler  are  also 
given,  and  if  applicable,  the  use  of  compiler  optimization  features  is  ex- 
plained . 

e.  Appendix  A is  the  Validation  Summary  Working  Document,  a working 
paper  resulting  from  the  compilation  and  execution  of  the  FCVS.  The  VSR 
is  derived  from  Appendix  A. 

1.4.  Use  of  the  VSR 

The  Department  of  the  Navy  may  make  full  and  free  public  disclosure  of  the 


Validation  Sununary  Report  (VSR)  in  accordance  with  the  "Freedom  of  Information 
Act"  (5  U.S.C.  #552).  The  results  of  the  validation  are  only  for  the  purposes 
of  satisfying  United  States  Government  requirements,  and  apply  only  to  the 
computer  system,  operating  system  release,  and  compiler  version  identified 
in  the  VSR. 

The  FORTRAN  Compiler  Validation  System  is  used  to  determine,  insofar  as  is 
practical,  the  degree  to  which  the  subject  compiler  conforms  to  the  FORTRAN 
Standard.  Thus,  the  VSR  is  necessarily  discretionary  and  Judgmental.  The 
United  States  Government  does  not  represent  or  warrant  that  the  statements, 
or  any  one  of  them,  set  forth  in  the  VSR  are  accurate  or  complete.  The  VSR 
is  not  meant  to  be  used  for  the  purpose  of  publicizing  the  findings  summarized 
therein. 

1.5  Sources  of  Additional  Information 

The  detailed  FORTRAN  language  specifications  are  given  in  the  publication 
"American  Standard  FORTRAN,  X3. 9-1966",  available  from  the  American  National 
Standards  Institute,  1430  Broadway,  New  York,  New  York  10018. 

An  explanation  of  the  FORTRAN  Compiler  Validation  System  is  contained  in  the 
FCVS  User’s  Guide.  This  document  explains  how  to  run  the  compiler  validation 
system.  The  User's  Guide  and  a magnetic  tape  containing  a copy  of  the  FCVS 
programs  are  available  from  the  National  Technical  Information  Service, 

5285  Port  Royal  Road,  Springfield,  Virginia,  22151.  (Ordering  information 
can  be  obtained  from  the  Federal  COBOL  Compiler  Testing  Service.) 


SECTION  2.  DETAILED  EVALUATION  OF  ERRORS. 


This  section  sununarizes  the  results  of  the  compilation  and  execution  of  the 
programs  comprising  the  FORTRAN  Compiler  Validation  System  (FCVS).  The  version 
of  the  FCVS  used  during  this  validation  is  shovm  inside  the  front  cover  of  the 
VSR. 

Section  2 is  made  up  of  two  subsections.  The  first  subsection  describes  each 
syntax  error  encountered  during  compilation  of  the  audit  routines,  and  the 
second  subsection  describes  the  semantic  errors  encountered  during  execution 
of  the  audit  routines. 

Each  error  or  deviation  noted  in  this  section  makes  reference  to  a program 
contained  in  Appendix  A (Validation  Summary  Working  Document),  This  reference 
provides  the  documented  results  of  an  occurrence  of  errors/deviations  detected 
during  the  running  of  the  FCVS  using  the  compiler  within  the  environment 
identified  in  this  document.  The  Validation  Summary  Working  Document  is 
presented  in  sequence  by  program  number. 
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2.1  Syntactical  Errors 


2.1.1  The  compiler  rejected  the  definition  of  a statement  function  in  which 
the  dummy  arguments  did  not  appear  in  the  expression  portion  of  the 
definition.  See  FM020. 

X3. 9-1966  References:  Section  8.1,  Statement  Functions 
2.2  Semantic  Errors 
No  errors. 
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SECTION  3.  SOFTWARE  ENVIRONMENT. 
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The  compiler  referenced  in  this  document  was  validated  using  the  software 
environment  described  in  this  section.  When  using  a modification  of  the 
described  environment,  the  compiler  may  or  may  not  continue  to  conform  to  the 
Standard.  It  should  be  noted  that  during  the  validation  process,  an  attempt 
is  made  to  validate  as  many  different  options  as  possible. 

The  use  of  compiler  options,  logical  unit/physical  device  assignments, 
and  any  form  of  optimization  which  is  not  described  in  this  report  could  cause 
the  compiler  to  produce  a program  that  does  not  perform  according  to  the 
specifications  of  Standard  FORTRAN.  Only  the  environment  described  in  this 
document  has  been  used  with  this  compiler  to  satisfy  the  validation  require- 
ments of  the  Department  of  the  Navy. 

1.  Options  or  parameters  used  on  the  processor  call  statement  for  the  compiler. 
Options  specified: 

a.  Batch  - Without  Optimization. 

//XEQFT  EXEC  FORTXCLG 

//  FARM . FORTr • BCD , LOA  D , SOURCE , NODECK , NOLIST , SIZE (MAX ), OPT (0 ) ' 

Even  though  the  'BCD'  option  was  specified  on  the  FORTRAN  call 
statement  this  compiler  generated  the  source  listing  before  it 
performed  the  actual  character  code  conversion.  All  conversion 
was  performed  successfully  with  the  exception  that  the  special 
characters  "r+O"  were  not  converted  when  contained  within  comment 
lines,  within  the  Hollerith  constants  of  data  initialization 
statements,  and  within  the  Hollerith  field  descriptors  of  the 
FORMAT  statements. 

b.  Batch  - With  Optimization. 

//XEQFT  EXEC  FORTXCLG 

//  FARM . FORTs ' BCD , LOAD , SOURCE , NODECK , NOLIST , SIZE(MAX ) , OPT (2 ) * 

Even  though  the  'BCD'  option  was  specified  on  the  FORTRAN  call 
statement  this  compiler  generated  the  source  listing  before  it 
performed  the  actual  character  code  conversion.  All  conversion 
was  performed  successfully  with  the  exception  that  the  special 
characters  "=+()"  were  not  converted  when  contained  within  comment 
lines,  within  the  Hollerith  constants  of  data  initialization 
statements,  and  within  the  Hollerith  field  descriptors  of  the 
FORMAT  statements. 

c.  Time-sharing. 

The  time-sharing  processing  mode  was  not  used  to  validate  this 
compiler. 

2.  Logical  Unit/Physical  Device  Assignments. 

a.  Batch  Compiler  Runs. 
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Printer  Destined  Files: 


Logical  unit  06  was  assigned  to  SYSOUTs* 

Tape  Files: 

Logical  unit  08  was  assigned  to  a tape  file  by  using  the  following 
JCL  card. 

//FTOBFOOI  DD  UNIT=TAPEHI ,V0L=SER=JBJ101 ,DSN=XXX 
Sequential  Mass-storage  Files: 

Logical  unit  08  was  assigned  to  a mass-storage  file  by  using  the 
following  JCL  card . 

//FT08F001  DD  DSN=4XXX,UNIT=V3330,SPACE={CYL,5) 

Card  Input  Files: 

Logical  unit  05  was  assigned  to  the  card  reader.  The  following 
JCL  card  preceeds  the  audit  routine  when  using  the  card  reader. 

//FT05F001  DD  • 

b.  Time-sharing  Compiler  Runs. 

The  time-sharing  mode  was  not  used  to  validate  this  compiler. 

3.  Optimization.  The  compiler  may  or  may  not  have  optimization  features. 

If  there  was  an  optimization  feature  available,  it  was  used  during  the 
validation  process  (during  a separate  execution  of  the  Compiler  Validation 
System)  to  determine  if  its  use  causes  the  compiler  to  produce  a program  which 
does  not  give  the  expected  results.  If  the  optimization  is  invoked  through 
the  compile:  ;all  statement  then  it  is  mentioned  in  paragraph  1 above.  If 
it  is  invoked  through  the  introduction  of  a compiler  directing  source  program 
statement,  it  is  shown  below.  Optimization  which  would  require  modification 
to  source  program  statments  is  not  considered  in  this  report  in  that  it  is 
beyond  the  scope  of  the  use  of  Standard  FORTRAN  and  the  validation  process. 

The  optimization  feature  for  this  compiler  is  invoked  through  the  compiler 
call  statement.  See  1.  above. 

M.  Compiler. 

FORTRAN  IV  H Extended,  Level  2.2 
5.  Operating  system. 

MVS,  Release  3-7,  JES2 
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APPENDIX  A 

VALIDATION  SUMMARY  WORKING  DOCUMENT 


This  appendix  is  a working  paper  produced  during  the  validation  and 
documents  the  results  of  the  compilation  and  execution  of  each  of  the 
programs  comprising  the  FCVS.  The  results  contained  herein  are  based  on 
the  use  of  the  compiler  within  the  Validation  Environment  identified  in 
this  appendix.  This  appendix  (Validation  Summary  Working  Document)  is  not 
part  of  the  official  Validation  Summary  Report  (VSR),  and  it  is  not  intended 
to  reflect  in  any  way  the  compiler's  usefulness  or  degree  of  conformance 
to  the  language  specifications. 

The  reader  of  this  appendix  should  keep  in  mind  that  the  same  problem 
area  may  appear  in  more  than  one  program  but  is  considered  only  as  a 
single  discrepancy,  and  the  problem  is  reflected  only  once  in  the  body  of 
the  VSR.  (The  VSR  will  in  turn  only  reference  the  first  occurrence  of  the 
problem  in  the  appendix.) 

This  appendix  is  divided  into  four  parts.  The  first  part  describes 
the  Validation  Environment.  The  second  part  lists  the  Monitor  Input  Cards 
used  in  creating  a job  control  stream  for  execution  in  the  batch  mode. 

The  third  part  shows  the  control  cards  required  to  compile  and  execute  an 
individual  program.  The  fourth  part  of  the  document  is  divided  into  two 
categories  of  information:  compilation  results  and  execution  results. 
Information  items,  such  as  compiler  warning  messages,  are  included  in  the 
summary  of  compilation  and  execution  results. 

The  reference  document  for  FORTRAN  is  American  Standard  FORTRAN, 

X3. 9-1966. 
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VALIDATION  ENVIRONMENT 


COMPILER  IDENTIFICATION : 
COMPUTER  SYSTEM: 
OPERATING  SYSTEM: 


FORTRAN  IV  H Extended,  Level  2.2 
IBM  SYSTEM  370/168 
MVS,  Release  3-7,  JES2 


Each  of  the  programs  comprising  the  FCVS  was  compiled  and  executed 
twice  in  the  batch  mode.  First,  the  programs  were  compiled  and  executed 
without  the  compiler  optimization  feature,  and  then  the  programs  were 
compiled  and  executed  with  the  compiler  optimization  feature  requested.  In 
addition,  the  programs  which  test  I/O,  FM100  through  FM108,  v;ere  run  both 
with  and  without  optimization.  The  programs  were  first  run  with  the  output 
logical  unit  assigned  to  a tape  device,  and  then  rerun  with  the  unit  assigned 
to  a maSs-storage  device. 


FCVS  EXECUTIVE  ROUTINE  CONTROL  CARDS 


The  FCVS  Executive  Routine  was  used  to  prepare  the  FCVS  programs  for 
execution  in  the  batch  mode.  The  Control  Cards  used  as  input  to  the  FCVS 
Executive  Routine  together  with  the  job  control  stream  for  executing  the 
Executive  Routine  are  listed  below: 

//JBJ1HN00  JOB  3POA069K00060J, 'VALENTINE* , 

//  MSCLEVEL= (0,0), NOTIFYr JB J 1 ,MSGCLASS=A , CLASSrB 

//JOBLIB  DD  DSN=J1F.NAVYLINK,DISP=SHR 
//XEQEXEC  EXEC  PGMrASOOl 
//FT06F001  DD  SYS0UT=* 

//FT07F001  DD  DSN=JBJ1 .NAVYSOUR.CNTL,DISP=SHR 

//FT08F0O 1 DD  DSN=&&0UT , DISP= ( , PASS) , UNIT=V3330 , SPACEr ( CYL , ( 1 , 1 ) ) 
//FT09F001  DD  DSN=JBJ1 .FM015INP,DISP=SHR 
//FT05F001  DD  • 

(FORTRAN  audit  routine  selection  cards) 

X-060  106  = 8 

X-070  107  = 8 

X-080  108  = 8 

X-090  109  = 8 

X-100  no  = 8 
X-110  111  = 8 

X-120  112  = 8 

•LIST  U 
•END-MONITOR 
•BEGIN-UPDATE 
•START, FM020 
r00250C00250 
=00320000320 
=00350C00350 
=OlMlOCOm20 
=01660C01680 
•END-UPDATE 
•END-INPUT 
/• 

// 
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CONTROL  CARDS  FOR  RUNNING  FCVS  PROGRAMS 


The  Job  control  stream  for  an  individual  program  consisted  of  the 
following  control  cards: 

//JBJ1HN00  JOB  3POA069K00060J, 'VALENTINE' , 

//  MSGLEVEL=(0,0) .NOTIFYrJBJI ,MSGCLASS=A ,CLASS=B 

//JOBLIB  DD  DSN=J1F.NAVYLINK,DISP=SHR 
//XEQFT  EXEC  FORTXCLG 

//  PARM.FORTr 'BCD, LOAD, SOURCE, NODECK, NOLIST, SIZE(MAX),0PT(0)' 

//FORT.SYSPRINT  DD  SYSOUT=* 

//FORT.SYSIN  DD  DSN=&«.OUT,DISP=(CLD, DELETE) 

(audit  routine  source  program) 

//LKED.SYSPRINT  DD  SYSOUTrA 
//GO.FT06F001  DD  SYSOUTs* 

//GO.FT08F001  DD  DSNrXXX ,UNIT=TAPEHI ,V0L=SER=JBJ101 
//GO.SYSIN  DD  • 

OIPB'JSSTSgABCDEFGHI JKLMNOPORSTUVWXYZ  :*-•/{) , . $ 

/• 

// 


RUN  SUMMARIES 


FM001  through  FMOIM 

A.  Compilation 
No  errors. 

B.  Execution 
No  errors. 

FM015 

A.  Compilation 

With  the  'BCD'  option  specified  on  the  FORTRAN  compiler  call  statement, 
four  special  characters  '=+()'  were  not  converted  within  the  Hollerith 
constants  of  the  data  initialization  statements  and  the  Hollerith 
field  descriptors  of  the  FORMAT  statements.  In  addition,  the  same 
special  characters  were  not  converted  within  Comment  Lines. 

B.  Execution 

FM015  executed  correctly  when  the  data  being  read  from  the  system 
input  device  and  the  data  to  which  it  was  compared  within  the  program 
were  consistent  in  format  and  actual  physical  representation  (i.e., 
either  both  converted  or  both  unconverted). 

FM016  through  FM019 

A.  Compilation 
No  errors. 

B.  Execution 
No  errors. 

FM020 

A.  Compilation 

The  FORTRAN  statements 

IFONOKIDONOI)  = 32767 
LFTNOKLDTNOI)  = .TRUE. 

in  Tests  553  and  55**  caused  the  compiler  to  generate  the  fatal  message 

ISN  IFE229I  8(E)  ALL  THE  ARGUMENTS  OF  AN  ARITHMETIC  STATEMENT 

FUNCTION  ARE  NOT  USED  IN  THE  DEFINITION. 

The  compiler  aborted  with  a severity  code  equal  to  8.  After  the  flagged 
statements  and  Tests  553  and  554  were  deleted  the  updated  program 
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compiled  correctly. 
B.  Execution 


No  errors. 

FM021  through  FM0M5 

A.  Compilation 
No  errors. 

B.  Execution 
No  errors. 

FM050  through  FM062,  FMO8O  through  FM083i  and  FM097  through  FM099 

A.  Compilation 
No  errors. 

B.  Execution 
No  errors. 


FORTRAN  I/O  Routines  - FM100  through  FM108 

These  audit  routines  were  executed  with  the  output  logical  unit  assigned 
to  a tape  device  and  rerun  with  the  output  logical  unit  assigned  to  a mass- 
storage  device. 

FMIOO  through  FM108 

A.  Compilation 

\ 

No  errors. 

B.  Execution 
No  errors. 

FM109 

A.  Compilation 

With  the  'BCD'  option  specified  on  the  FORTRAN  compiler  call  statement, 
the  special  character  + (plus)  was  not  converted  when  used  with  the 
Hollerith  field  descriptor  of  a FORMAT  statement. 

B.  Execution 

FM109  executed  correctly  when  the  plus  (•♦•)  characters  in  the  Hollerith 
field  descriptors  of  the  FORMAT  statement  were  properly  converted. 


